clean_names = function(first, middle = NULL, last, do_titles = F) {
  require(stringr)
  require(stringi)
  require(magrittr)
  require(data.table)
  #Nicknames
  nicknames = structure(list(name = c("aaron", "aaron", "aaron", "abel", "abiel", 
                                      "abraham", "abraham", "abraham", "abraham", "abraham", "abraham", 
                                      "abraham", "abraham", "abraham", "abraham", "abraham", "abraham", 
                                      "abraham", "abram", "abram", "abram", "absalom", "absalom", "absalom", 
                                      "absalom", "absalom", "achilles", "adam", "adam", "addison", 
                                      "adelaide", "adelaide", "adelbert", "adelbert", "adolph", "adolph", 
                                      "adolph", "adolph", "adolph", "adolph", "adolph", "adolph", "adolph", 
                                      "adolph", "adolph", "adolph", "adrian", "adrian", "alan", "alan", 
                                      "alan", "alan", "alan", "albert", "albert", "albert", "albert", 
                                      "albert", "albert", "albert", "albert", "albert", "albert", "albert", 
                                      "albert", "albion", "alexander", "alexander", "alexander", "alexander", 
                                      "alexander", "alexander", "alexander", "alexander", "alexander", 
                                      "alexander", "alexander", "alexander", "alexander", "alexander", 
                                      "alexander", "alexander", "alexander", "alexander", "alexander", 
                                      "alexander", "alexander", "alexander", "alexander", "alexander", 
                                      "alexander", "alexander", "alfred", "alfred", "alfred", "alfred", 
                                      "alfred", "alfred", "alfred", "alfred", "alfred", "alfred", "algernon", 
                                      "alicia", "alicia", "alicia", "almo", "alois", "alonzo", "alonzo", 
                                      "alonzo", "alonzo", "alonzo", "alonzo", "alonzo", "alonzo", "alonzo", 
                                      "alonzo", "alonzo", "alonzo", "alonzo", "alonzo", "alonzo", "alpha", 
                                      "alphaeus", "alphaeus", "alphaeus", "alphonso", "alphonso", "alphonso", 
                                      "alphonso", "alphonso", "alphonso", "alphonso", "alvah", "alvin", 
                                      "alvin", "ambrose", "ambrose", "amos", "amos", "ananias", "ananias", 
                                      "anastasio", "andreas", "andreas", "andreas", "andrew", "andrew", 
                                      "andrew", "andrew", "andrew", "andrew", "andrew", "andrew", "andrew", 
                                      "andrew", "andrew", "andrew", "andrew", "andrew", "ange", "anna", 
                                      "ansel", "ansel", "anthony", "anthony", "anthony", "anthony", 
                                      "anthony", "anthony", "anthony", "anthony", "anthony", "anthony", 
                                      "anthony", "anthony", "anthony", "anthony", "anthony", "anthony", 
                                      "anthony", "anthony", "anthony", "anthony", "anthony", "anthony", 
                                      "anthony", "anthony", "aquilla", "archibald", "archibald", "archibald", 
                                      "archibald", "archibald", "archibald", "archibald", "archibald", 
                                      "archibald", "archibald", "archibald", "archibald", "archibald", 
                                      "archibald", "armand", "arnold", "arnold", "arnold", "arnold", 
                                      "artemas", "arthur", "arthur", "arthur", "arthur", "arthur", 
                                      "arthur", "arthur", "arthur", "arthur", "arthur", "arthur", "arthur", 
                                      "asbury", "asbury", "ashley", "aubrey", "augusttus", "augustus", 
                                      "augustus", "augustus", "augustus", "augustus", "augustus", "augustus", 
                                      "augustus", "augustus", "augustus", "augustus", "augustus", "augustus", 
                                      "augustus", "augustus", "augustus", "augustus", "augustus", "augustus", 
                                      "augustus", "augustus", "augustus", "augustus", "augustus", "augustus", 
                                      "austin", "austin", "bailey", "baltazar", "barnaba", "barnabas", 
                                      "barnabas", "barney", "barney", "bartholomew", "bartholomew", 
                                      "bartholomew", "bartholomew", "bartholomew", "bartholomew", "bartholomew", 
                                      "basil", "basil", "basil", "benedict", "benjamin", "benjamin", 
                                      "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", 
                                      "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", 
                                      "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", 
                                      "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", 
                                      "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", "benjamin", 
                                      "benjamin", "benjamin", "benjamin", "bennett", "bennett", "bentley", 
                                      "bentley", "bernard", "bernard", "bernard", "bernard", "bernard", 
                                      "bernard", "bernard", "bernard", "bernhard", "bernhard", "bernhard", 
                                      "bernhard", "bernhard", "bernhard", "bernhard", "berry", "bert", 
                                      "bert", "bert", "bert", "bert", "bert", "bert", "bert", "bert", 
                                      "bertram", "bertram", "beverly", "beverly", "bismarck", "bolivar", 
                                      "boone", "bradley", "bryant", "burton", "burton", "byron", "byron", 
                                      "caesar", "caesar", "caesar", "caesar", "caesar", "caesar", "cair", 
                                      "caleb", "caleb", "caleb", "caleb", "calvin", "calvin", "calvin", 
                                      "calvin", "calvin", "calvin", "calvin", "cameron", "camilla", 
                                      "care", "carey", "carey", "caroline", "carroll", "carroll", "carroll", 
                                      "carroll", "casper", "casper", "cassius", "cassius", "cassius", 
                                      "cassius", "cassius", "catherine", "celia", "celia", "cephas", 
                                      "chan", "charles", "charles", "charles", "charles", "charles", 
                                      "charles", "charles", "charles", "charles", "charles", "charles", 
                                      "charles", "charles", "charles", "charles", "charles", "charles", 
                                      "charles", "charles", "charles", "charles", "charles", "charles", 
                                      "charles", "charles", "charles", "charles", "charles", "charles", 
                                      "charles", "chauncey", "chauncey", "chauncey", "chauncey", "chauncey", 
                                      "chester", "chester", "chin", "chong", "christian", "christian", 
                                      "christian", "christian", "christine", "christine", "christine", 
                                      "christine", "christine", "christopher", "christopher", "christopher", 
                                      "christopher", "christopher", "christopher", "christopher", "christopher", 
                                      "christopher", "christopher", "christopher", "christopher", "christopher", 
                                      "christopher", "christopher", "christopher", "christopher", "christopher", 
                                      "christopher", "christopher", "christopher", "christopher", "cicero", 
                                      "clai", "claiborne", "claiborne", "claiborne", "claiborne", "claiborne", 
                                      "claiborne", "claiborne", "clain", "claior", "clair", "clair", 
                                      "claire", "claire", "claire", "claire", "clara", "clarence", 
                                      "clarence", "clarence", "clarence", "clarence", "clarence", "clarence", 
                                      "clari", "claude", "claude", "claude", "claude", "claude", "claude", 
                                      "clayton", "clear", "clement", "clement", "clement", "clement", 
                                      "clement", "clement", "clement", "clifford", "clifford", "clinton", 
                                      "clinton", "cloud", "clyde", "clyde", "coleman", "colombe", "columbus", 
                                      "columbus", "commodore", "commodore", "conn", "conrad", "conrad", 
                                      "conrad", "conrad", "conrad", "constantine", "corey", "corey", 
                                      "cornelius", "cornelius", "cornelius", "cornelius", "cornelius", 
                                      "cornelius", "cornelius", "cornelius", "cornelius", "cornelius", 
                                      "cornelius", "cornelius", "cornelius", "cornelius", "cornelius", 
                                      "crawford", "croix", "crowling", "cud", "curtis", "curtis", "curtis", 
                                      "curtis", "cyr", "cyr", "cyril", "cyrus", "cyrus", "cyrus", "cyrus", 
                                      "dallas", "daniel", "daniel", "daniel", "daniel", "daniel", "daniel", 
                                      "daniel", "daniel", "daniel", "daniel", "daniel", "daniel", "daniel", 
                                      "daniel", "daniel", "daniel", "darius", "darius", "darius", "david", 
                                      "david", "david", "david", "david", "david", "david", "david", 
                                      "david", "decatur", "decatur", "dempsey", "denise", "dennis", 
                                      "dennis", "dennis", "dennis", "dennis", "dennis", "derrick", 
                                      "devon", "dewitt", "dietrich", "dietrich", "dietrich", "dietrich", 
                                      "dietrich", "dietrich", "dominic", "dominic", "dominic", "dominic", 
                                      "donald", "donald", "dorothy", "douglas", "douglas", "douglas", 
                                      "douglas", "drew", "drury", "dudley", "dura", "dwight", "earl", 
                                      "earl", "earl", "earnest", "ebenezer", "ebenezer", "ebenezer", 
                                      "edgar", "edgar", "edgar", "edmund", "edmund", "edmund", "edmund", 
                                      "edmund", "edna", "edward", "edward", "edward", "edward", "edward", 
                                      "edward", "edward", "edward", "edward", "edward", "edward", "edward", 
                                      "edward", "edward", "edward", "edward", "edward", "edward", "edward", 
                                      "edward", "edward", "edward", "edward", "edward", "edward", "edward", 
                                      "edward", "edward", "edwin", "eger", "eleazar", "eli", "elias", 
                                      "elihu", "elijah", "elijah", "elijah", "elijah", "elijah", "elijah", 
                                      "elijah", "elijah", "elijah", "eliphelet", "elizabeth", "elizabeth", 
                                      "elizabeth", "elizabeth", "elizabeth", "elkanah", "elliot", "elliot", 
                                      "elliot", "ellis", "elmer", "elmer", "elmer", "elmer", "elmer", 
                                      "elmo", "elmo", "elmo", "elmo", "elmon", "elmore", "elmore", 
                                      "elms", "elwin", "emerson", "emery", "emery", "emery", "emery", 
                                      "emil", "emil", "emil", "emil", "emil", "emil", "emil", "emil", 
                                      "emil", "emmanuel", "emmanuel", "emmanuel", "emmanuel", "emmanuel", 
                                      "emmanuel", "emmanuel", "emmanuel", "emmanuel", "emmanuel", "emmet", 
                                      "emmet", "emmet", "emmet", "emmet", "emmet", "emmet", "enoch", 
                                      "enoch", "enoch", "ephraim", "ephraim", "ephraim", "ephraim", 
                                      "ephraim", "ephraim", "erasmus", "eric", "eric", "eric", "eric", 
                                      "ernest", "ernest", "ernest", "ernest", "ernest", "ernest", "ernest", 
                                      "erskine", "erwin", "esau", "ethan", "ethan", "eugene", "eugene", 
                                      "eugene", "eugene", "eugene", "eugene", "eugene", "eugene", "eugene", 
                                      "eugene", "eugene", "eugene", "eugene", "eugene", "eugene", "eunice", 
                                      "eusebius", "eusebius", "eustace", "evan", "evan", "evan", "everett", 
                                      "everett", "everett", "everett", "ezekiel", "ezekiel", "ezekiel", 
                                      "ezekiel", "ezra", "ezra", "faustino", "felix", "felix", "felix", 
                                      "felix", "ferdinand", "ferdinand", "ferdinand", "ferdinand", 
                                      "ferdinand", "ferdinand", "ferdinand", "ferdinand", "ferdinand", 
                                      "ferdinand", "feugos", "fillmore", "firmin", "firmin", "firmin", 
                                      "flavius", "fletcher", "florence", "floyd", "floyd", "forrest", 
                                      "fountain", "frank", "frank", "frank", "frank", "frank", "frank", 
                                      "frank", "frank", "frank", "frank", "frank", "frank", "frank", 
                                      "frank", "frank", "frank", "frank", "frank", "frank", "frank", 
                                      "franklin", "franklin", "franklin", "franklin", "franklin", "franklin", 
                                      "franklin", "frederick", "frederick", "frederick", "frederick", 
                                      "frederick", "frederick", "frederick", "frederick", "frederick", 
                                      "frederick", "frederick", "frederick", "frederick", "frederick", 
                                      "frederick", "frederick", "frederick", "frederick", "frederick", 
                                      "frederick", "frederick", "frederick", "frederick", "frederick", 
                                      "frederick", "frederick", "frederick", "frederick", "frederick", 
                                      "frederick", "frederick", "frederick", "frederick", "frederick", 
                                      "frederick", "frederick", "frederick", "frederick", "frederick", 
                                      "freeman", "fremont", "gabriel", "gabriel", "gabriel", "gabriel", 
                                      "garrett", "garrett", "garrett", "garrett", "gary", "geoege", 
                                      "george", "george", "george", "george", "george", "george", "george", 
                                      "george", "george", "george", "george", "george", "george", "george", 
                                      "george", "george", "george", "gerald", "gerald", "gerald", "gerald", 
                                      "gerald", "gideon", "gideon", "gideon", "gilbert", "gilbert", 
                                      "giles", "glenn", "godfrey", "godfrey", "godfrey", "godfrey", 
                                      "godfrey", "gordon", "gordon", "gordon", "gottlieb", "gottlieb", 
                                      "gottlieb", "gottlieb", "gottlieb", "gottlieb", "gottlieb", "gottlieb", 
                                      "grafton", "grant", "granville", "granville", "granville", "granville", 
                                      "grayson", "greenberry", "gregory", "gregory", "gregory", "griffin", 
                                      "griffith", "gustave", "gustave", "gustave", "gustave", "gustave", 
                                      "gustave", "gustavus", "gustavus", "gustavus", "gustavus", "ham", 
                                      "hamilton", "hampton", "hampton", "hannibal", "harden", "harlan", 
                                      "harlan", "harlan", "harley", "harley", "harold", "harold", "harold", 
                                      "harris", "harrison", "harrison", "harvey", "harvey", "harvey", 
                                      "harvey", "harvey", "heinrich", "heinrich", "heinrich", "helmut", 
                                      "hendrik", "henry", "henry", "henry", "henry", "henry", "henry", 
                                      "henry", "henry", "henry", "henry", "henry", "henry", "henry", 
                                      "henry", "henry", "henry", "henry", "henry", "henry", "henry", 
                                      "henry", "henry", "herbert", "herbert", "herbert", "herbert", 
                                      "herbert", "herbert", "herbert", "herbert", "herman", "herman", 
                                      "herman", "herman", "herman", "herman", "herman", "herman", "herschel", 
                                      "herschel", "hezekiah", "hezekiah", "hezekiah", "hezekiah", "hezekiah", 
                                      "hezekiah", "hezekiah", "hillary", "hillary", "hillary", "hillary", 
                                      "hillary", "hippolyte", "hiram", "hiram", "hiram", "hiram", "hiram", 
                                      "hiram", "hiram", "hiram", "horace", "horace", "horace", "horace", 
                                      "horace", "horace", "horace", "horatio", "hosea", "hosea", "hosea", 
                                      "hosea", "howard", "howard", "howard", "hudson", "hugh", "hugh", 
                                      "hugh", "hugh", "hugh", "hugh", "humphrey", "humphrey", "iago", 
                                      "ignatius", "ignatius", "ignatius", "ignatius", "ira", "ira", 
                                      "irving", "isaac", "isaac", "isaac", "isaac", "isaac", "isaac", 
                                      "isaac", "isaac", "isaac", "isaac", "isaac", "isaac", "isaac", 
                                      "isaac", "isaac", "isaac", "isaac", "isadore", "isadore", "isadore", 
                                      "isah", "isah", "isaiah", "isam", "isam", "isam", "ishmael", 
                                      "israel", "israel", "israel", "israel", "israel", "israel", "israel", 
                                      "ivan", "ivy", "jabez", "jabez", "jacob", "jacob", "jacob", "jacob", 
                                      "jacob", "jacob", "jacob", "jacob", "jacob", "jacques", "jago", 
                                      "james", "james", "james", "james", "james", "james", "james", 
                                      "james", "james", "james", "james", "james", "james", "james", 
                                      "james", "james", "james", "james", "james", "james", "james", 
                                      "james", "james", "jane", "japheth", "jared", "jared", "jason", 
                                      "jasper", "jean", "jedediah", "jedediah", "jedidiah", "jefferson", 
                                      "jeffrey", "jeffrey", "jeffrey", "jeffrey", "jeffrey", "jehiel", 
                                      "jemima", "jephtha", "jeremiah", "jeremiah", "jeremiah", "jeremiah", 
                                      "jeremiah", "jeremiah", "jeremiah", "jeremiah", "jeremiah", "jerome", 
                                      "jerome", "jerome", "jesse", "jesse", "jesse", "jesse", "jesse", 
                                      "jesse", "jesse", "jesse", "jesse", "jesse", "jesse", "jesse", 
                                      "jesus", "jex", "joachim", "joachim", "job", "jody", "joel", 
                                      "joel", "johann", "johann", "johannes", "johannes", "johannes", 
                                      "john", "john", "john", "john", "john", "john", "john", "john", 
                                      "john", "john", "john", "john", "john", "john", "john", "john", 
                                      "john", "john", "john", "john", "john", "john", "john", "john", 
                                      "john", "john", "john", "john", "john", "john", "john", "john", 
                                      "jonah", "jonah", "jonah", "jonathan", "jonathan", "jonathan", 
                                      "jonathan", "jonathan", "jonathan", "jonathan", "jonathan", "jonathan", 
                                      "jonathan", "jonathan", "jordan", "jordan", "jordan", "jordan", 
                                      "jordan", "jose", "jose", "joseph", "joseph", "joseph", "joseph", 
                                      "joseph", "joseph", "joseph", "joseph", "joseph", "joseph", "joseph", 
                                      "joseph", "joseph", "joseph", "joseph", "joseph", "joseph", "joseph", 
                                      "joseph", "joseph", "joseph", "joseph", "joseph", "joseph", "joshua", 
                                      "joshua", "joshua", "joshua", "joshua", "joshua", "josiah", "julian", 
                                      "julian", "julian", "julian", "julian", "julian", "julian", "julian", 
                                      "julian", "julius", "julius", "julius", "julius", "julius", "julius", 
                                      "julius", "julius", "junius", "juste", "justin", "justin", "kenneth", 
                                      "kenneth", "kirby", "klaus", "klaus", "klaus", "knut", "knut", 
                                      "knut", "knut", "laban", "laban", "lacy", "lafayette", "lafayette", 
                                      "lafayette", "lafayette", "lafayette", "lafayette", "lafayette", 
                                      "lafayette", "lafayette", "lafayette", "lafayette", "lafayette", 
                                      "lafayette", "lafayette", "lafayette", "landon", "langford", 
                                      "laura", "laverne", "lawrence", "lawrence", "lawrence", "lawrence", 
                                      "lawrence", "lawrence", "lawrence", "lawrence", "lawrence", "lawrence", 
                                      "lawrence", "lawrence", "lawson", "leah", "leander", "ledger", 
                                      "lee", "lemuel", "lemuel", "lemuel", "lemuel", "lemuel", "leon", 
                                      "leon", "leon", "leon", "leonard", "leonard", "leonard", "leonard", 
                                      "leonard", "leonard", "leonard", "leonard", "leonard", "leonard", 
                                      "leonard", "leonard", "leonhard", "leonidas", "leonidas", "leonidas", 
                                      "leonidas", "leopold", "leopold", "leroy", "leroy", "leslie", 
                                      "leslie", "leslie", "leung", "lewalte", "lewis", "lewis", "lewis", 
                                      "lewis", "lewis", "lewis", "lewis", "lewis", "lewis", "lewis", 
                                      "lewis", "lewis", "lewis", "lewis", "lewis", "lewis", "lewis", 
                                      "lewis", "lewis", "lewis", "lewis", "lewis", "lewis", "lewis", 
                                      "lewis", "lewis", "lewis", "lewis", "lewis", "lezer", "lincoln", 
                                      "lindsay", "lindsay", "lindsay", "lindsay", "linus", "livy", 
                                      "lloyd", "lloyd", "lloyd", "lloyd", "llywelyn", "llywelyn", "llywelyn", 
                                      "llywelyn", "llywelyn", "llywelyn", "llywelyn", "llywelyn", "llywelyn", 
                                      "llywelyn", "llywelyn", "llywelyn", "llywelyn", "llywelyn", "llywelyn", 
                                      "llywelyn", "llywelyn", "llywelyn", "llywelyn", "loggen", "loren", 
                                      "loren", "loren", "lorenzo", "lorenzo", "lorenzo", "lorenzo", 
                                      "lorenzo", "lorenzo", "lorenzo", "lorraine", "lot", "lovell", 
                                      "lucas", "lucian", "lucian", "lucius", "lucius", "lucius", "ludwig", 
                                      "luke", "luther", "lyman", "lyndon", "madison", "malachi", "malcolm", 
                                      "malcolm", "malcolm", "manasseh", "manuel", "manuel", "manuel", 
                                      "manus", "marcellus", "marcellus", "marcellus", "marcus", "marcus", 
                                      "marcus", "marcus", "marcus", "marion", "marion", "marion", "mark", 
                                      "marlon", "marquis", "marshall", "marshall", "marshall", "martial", 
                                      "martin", "martin", "martin", "martin", "martin", "martin", "martin", 
                                      "martin", "martin", "marvin", "mary", "mathias", "mathias", "mathias", 
                                      "mathias", "mathias", "mathias", "mathias", "mathias", "mathias", 
                                      "mathias", "mathue", "matilda", "matthew", "matthew", "matthew", 
                                      "matthew", "matthew", "matthew", "matthew", "matthew", "matthew", 
                                      "matthew", "maurice", "maurice", "maurice", "maurice", "maximilian", 
                                      "maximilian", "maximilian", "maximilian", "maximilian", "maximilian", 
                                      "maximilian", "meade", "melchior", "melville", "melville", "melvin", 
                                      "melvin", "melvin", "melvin", "meredith", "meredith", "merle", 
                                      "mervyn", "micaiah", "michael", "michael", "michael", "michael", 
                                      "michael", "michael", "michael", "michael", "michael", "michael", 
                                      "michael", "michael", "michael", "michael", "michael", "michael", 
                                      "michael", "michael", "michael", "michael", "michael", "michael", 
                                      "michael", "michael", "michael", "michael", "michael", "millard", 
                                      "millard", "millard", "milton", "milton", "milton", "minor", 
                                      "mitchell", "mitchell", "mitchell", "monroe", "monroe", "monroe", 
                                      "monroe", "monroe", "montgomery", "mordecai", "morris", "morris", 
                                      "morrison", "mortimer", "mortimer", "mortimer", "morton", "moses", 
                                      "moses", "moses", "murdoch", "murray", "myron", "myron", "nahum", 
                                      "napoleon", "napoleon", "napoleon", "napoleon", "napoleon", "narcissus", 
                                      "nathan", "nathan", "nathaniel", "nathaniel", "nathaniel", "nathaniel", 
                                      "nathaniel", "nathaniel", "nathaniel", "nathaniel", "nathaniel", 
                                      "nathaniel", "nathaniel", "nathaniel", "nathaniel", "nehemiah", 
                                      "neil", "neil", "neil", "neil", "nels", "nels", "nels", "newton", 
                                      "newton", "newton", "newton", "nicholas", "nicholas", "nicholas", 
                                      "nicholas", "nicholas", "nicholas", "nicholas", "nicholas", "nicholas", 
                                      "nicholas", "nicholas", "nicholas", "nicholas", "nicholas", "nicholas", 
                                      "nicholas", "nicholas", "nicholas", "nicholas", "nicholas", "nicholas", 
                                      "nils", "noah", "noah", "nolan", "norman", "nutton", "obadiah", 
                                      "obadiah", "obadiah", "obadiah", "obadiah", "octavius", "octavius", 
                                      "olaf", "olaf", "olaf", "olaf", "olaf", "old", "oliver", "oliver", 
                                      "oliver", "oliver", "oliver", "oliver", "oliver", "oliver", "oliver", 
                                      "oliver", "oliver", "oliver", "orestes", "orlando", "orlando", 
                                      "orlando", "orlando", "orrin", "orrin", "orrin", "orson", "orson", 
                                      "orville", "orville", "orville", "orville", "oscar", "oscar", 
                                      "oscar", "oscar", "oscar", "oscar", "oscar", "oscar", "oscar", 
                                      "oscar", "oscar", "otis", "otis", "otis", "otto", "otto", "otto", 
                                      "otto", "otto", "otto", "ovid", "owen", "paris", "parker", "pascal", 
                                      "pascal", "patrick", "patrick", "patrick", "patrick", "patrick", 
                                      "patrick", "patrick", "patrick", "patrick", "patrick", "patrick", 
                                      "patrick", "patrick", "patrick", "paul", "paul", "paul", "paulino", 
                                      "pearl", "pearl", "pearl", "pearl", "percy", "percy", "percy", 
                                      "percy", "pere", "peree", "perry", "perry", "perry", "peter", 
                                      "peter", "peter", "peter", "peter", "peter", "peter", "peter", 
                                      "peter", "peter", "peter", "peyton", "philander", "philip", "philip", 
                                      "philip", "philip", "philip", "philip", "philip", "philip", "philip", 
                                      "philip", "philip", "philip", "phineas", "phineas", "phineas", 
                                      "pierre", "piet", "pinckney", "pleasant", "pleasant", "pleasant", 
                                      "pleasant", "pliny", "peter", "pompey", "pompey", "prentice", 
                                      "presley", "presley", "presley", "presley", "proville", "pubian", 
                                      "quentin", "quincy", "quincy", "raleigh", "ralph", "randall", 
                                      "randall", "randolph", "randolph", "raphael", "raphael", "raphael", 
                                      "raphael", "raymond", "raymond", "raymond", "raymond", "reece", 
                                      "reed", "reuben", "reuben", "reuben", "reuben", "reuben", "reuben", 
                                      "reuben", "reuben", "reuben", "reuben", "reuben", "reuel", "rexford", 
                                      "richard", "richard", "richard", "richard", "richard", "richard", 
                                      "richard", "richard", "richard", "richard", "richard", "riley", 
                                      "riley", "riley", "robert", "robert", "robert", "robert", "robert", 
                                      "robert", "robert", "robert", "robert", "robert", "robert", "robert", 
                                      "robert", "robert", "robert", "robert", "robert", "robert", "roderick", 
                                      "roderick", "roger", "roger", "roland", "roland", "roland", "roland", 
                                      "roland", "roland", "roland", "roland", "romulus", "ronald", 
                                      "roscoe", "roy", "roy", "roy", "roya", "rudolph", "rudolph", 
                                      "rudolph", "rudolph", "rudolph", "rudolph", "rufus", "rufus", 
                                      "rufus", "rufus", "rupert", "russell", "russell", "russell", 
                                      "russell", "russell", "russell", "salvador", "samuel", "samuel", 
                                      "samuel", "samuel", "samuel", "samuel", "samuel", "samuel", "samuel", 
                                      "samuel", "samuel", "samuel", "samuel", "samuel", "samuel", "samuel", 
                                      "samuel", "samuel", "samuel", "samuel", "samuel", "samuel", "sanford", 
                                      "sanford", "sanford", "saul", "scott", "seaborn", "seaborn", 
                                      "seaborn", "sebastian", "sebastian", "sebastian", "sebastian", 
                                      "seymour", "seymour", "seymour", "seymour", "shadrach", "shadrach", 
                                      "shadrach", "shadrach", "shadrach", "shadrach", "shadrach", "shadrach", 
                                      "shadrach", "shepherd", "sheridan", "sidney", "silas", "silas", 
                                      "silas", "silas", "silvanus", "silvanus", "silvanus", "simeon", 
                                      "simon", "simon", "simon", "simon", "simon", "simpson", "solomon", 
                                      "solomon", "solomon", "solomon", "solomon", "solomon", "solomon", 
                                      "solomon", "solomon", "solomon", "solomon", "solomon", "solomon", 
                                      "solomon", "solon", "solon", "stanislaus", "stanley", "stanley", 
                                      "stephen", "stephen", "stephen", "stephen", "stephen", "stephen", 
                                      "stephen", "stephen", "stephen", "stephen", "stephen", "stephen", 
                                      "stephen", "stephen", "sterling", "stewart", "stewart", "stewart", 
                                      "sullivan", "susan", "sven", "sydney", "sydney", "sydney", "sydney", 
                                      "sylvester", "sylvester", "sylvester", "sylvester", "taylor", 
                                      "taylor", "terence", "terence", "terence", "terrence", "thaddeus", 
                                      "thaddeus", "thaddeus", "thaddeus", "thaddeus", "thaddeus", "thaddeus", 
                                      "theobald", "theodore", "theodore", "theodore", "theodore", "theodore", 
                                      "theodore", "theodore", "theodore", "theodore", "theodore", "theodore", 
                                      "theodore", "theodore", "theodore", "theophilus", "theophilus", 
                                      "theophilus", "theophilus", "theophilus", "theophilus", "theresa", 
                                      "thomas", "thomas", "thomas", "thomas", "thomas", "thomas", "thomas", 
                                      "thomas", "thomas", "thomas", "thomas", "thomas", "thomas", "thomas", 
                                      "thomas", "thomas", "thomas", "thomas", "thomas", "thomas", "thomas", 
                                      "thompson", "thornton", "tillman", "tillman", "tillman", "timothy", 
                                      "timothy", "timothy", "timothy", "timothy", "timothy", "tobias", 
                                      "tobias", "tobias", "ulrich", "ulysses", "ulysses", "ulysses", 
                                      "ulysses", "ulysses", "ulysses", "ulysses", "ulysses", "ulysses", 
                                      "ulysses", "ulysses", "ulysses", "ulysses", "uriah", "uriah", 
                                      "valentine", "valentine", "valentine", "valentine", "valentine", 
                                      "vernon", "victor", "victor", "victor", "viles", "ville", "vincent", 
                                      "vincent", "vincent", "vincent", "vincent", "virgil", "virgil", 
                                      "virgil", "virgil", "vrain", "wade", "wade", "wallace", "wallace", 
                                      "wallace", "wallace", "wallace", "wallace", "walter", "walter", 
                                      "walter", "walter", "walter", "walter", "walter", "walter", "walter", 
                                      "warren", "warren", "warren", "warren", "washington", "washington", 
                                      "washington", "wayne", "webster", "webster", "welcome", "weldon", 
                                      "wellington", "wenzel", "wesley", "wesley", "wesley", "wesley", 
                                      "wesley", "wesley", "wesley", "wesley", "wesley", "wesley", "wilbur", 
                                      "wilbur", "wilbur", "wilbur", "wilbur", "wiley", "wiley", "wilhelm", 
                                      "wilhelm", "willard", "willard", "william", "william", "william", 
                                      "william", "william", "william", "william", "william", "william", 
                                      "william", "william", "william", "william", "william", "william", 
                                      "william", "william", "william", "william", "william", "william", 
                                      "william", "william", "william", "william", "william", "william", 
                                      "william", "william", "william", "william", "willis", "willis", 
                                      "willis", "wilmer", "wilson", "winfield", "winifred", "winifred", 
                                      "woo", "woodrow", "woodrow", "wyatt", "wyatt", "wyatt", "xavier", 
                                      "xavier", "ye", "zachary", "zachary", "zachary", "zachary", "zachary", 
                                      "zachary", "zachary", "zachary", "zachary", "zachary", "zadok", 
                                      "zadok", "zebediah", "zedekiah", "zeno", "zeno", "zephaniah", 
                                      "zephaniah"), nickname = c("aaran", "aron", "arron", "able", 
                                                                 "abial", "ab", "abb", "abe", "aberham", "abm", "abr", "abra", 
                                                                 "abrah", "abrahan", "abrahm", "abreham", "abrham", "abriham", 
                                                                 "abrm", "abrom", "abrum", "absalum", "abslom", "absolam", "absolem", 
                                                                 "absolom", "achille", "adams", "addam", "adison", "addie", "adie", 
                                                                 "adalbert", "adebert", "adolf", "adolfo", "adolfus", "adolp", 
                                                                 "adolphas", "adolphe", "adolphis", "adolpho", "adolphus", "adolpus", 
                                                                 "adoph", "dolphus", "adrain", "adrien", "alen", "alin", "allan", 
                                                                 "allen", "allin", "abert", "al", "albertis", "alberto", "albertus", 
                                                                 "albet", "albrecht", "albrt", "albt", "alburt", "alburtis", "alburtus", 
                                                                 "albon", "alax", "alaxander", "alec", "aleck", "alek", "alex", 
                                                                 "alexan", "alexand", "alexanderjr", "alexandre", "alexandrew", 
                                                                 "alexandria", "alexr", "alic", "alick", "alix", "alixander", 
                                                                 "alleck", "allex", "allexander", "alx", "alxander", "elaxander", 
                                                                 "elec", "elex", "elexander", "afred", "alf", "alferd", "alfered", 
                                                                 "alfert", "alfredo", "alfrid", "alpherd", "alphred", "stalfred", 
                                                                 "algenon", "elisah", "elish", "elishia", "stalmo", "aloys", "alanzo", 
                                                                 "alenzo", "alonso", "alonza", "alozo", "elonza", "elonzo", "lon", 
                                                                 "loni", "lonie", "lonnie", "lonny", "lonza", "lonzo", "olonzo", 
                                                                 "alfa", "alpheus", "alphius", "alphus", "alfons", "alfonse", 
                                                                 "alfonzo", "alphons", "alphonse", "alphonsus", "alphonzo", "alvy", 
                                                                 "alvan", "alven", "ambroise", "ambros", "amous", "amus", "annanias", 
                                                                 "annias", "anastacio", "andres", "andrias", "andrus", "adrew", 
                                                                 "and", "andew", "andey", "andie", "andr", "andrews", "androw", 
                                                                 "andru", "andrue", "andrw", "andw", "andy", "standrew", "stange", 
                                                                 "stanna", "ancel", "ancil", "ant", "anthany", "anthny", "anthon", 
                                                                 "anthoney", "antney", "antny", "anto", "antoin", "antoine", "anton", 
                                                                 "antona", "antone", "antoney", "antoni", "antonie", "antony", 
                                                                 "antwine", "athony", "tone", "toney", "toni", "tonie", "tony", 
                                                                 "aquila", "arch", "archa", "archabald", "archable", "archbald", 
                                                                 "archd", "arche", "archebald", "archey", "archibal", "archible", 
                                                                 "archibold", "archie", "archy", "armond", "arne", "arni", "arnie", 
                                                                 "arno", "artemus", "art", "arter", "arthar", "arther", "arthor", 
                                                                 "artie", "artur", "arty", "athur", "aurther", "aurthur", "authur", 
                                                                 "asberry", "asbery", "ashly", "aubry", "staugusttus", "agust", 
                                                                 "agusta", "agustas", "agustin", "agustine", "agustus", "aug", 
                                                                 "augest", "augst", "augt", "augus", "august", "augusta", "augustas", 
                                                                 "auguste", "augustes", "augustin", "augustine", "augustis", "gus", 
                                                                 "guss", "gussie", "gust", "gustus", "staugustine", "austen", 
                                                                 "auston", "baily", "balthasar", "barnabasr", "barna", "barnabus", 
                                                                 "barnie", "barny", "bart", "barth", "bartholamew", "bartholemew", 
                                                                 "bartholmew", "bartie", "barto", "basel", "bazel", "bazil", "benedick", 
                                                                 "bejamin", "ben", "bengaman", "bengamin", "bengamine", "bengeman", 
                                                                 "bengiman", "bengman", "benie", "benj", "benja", "benjam", "benjaman", 
                                                                 "benjamen", "benjamine", "benjamon", "benjeman", "benjemin", 
                                                                 "benjiman", "benjimen", "benjimin", "benjimine", "benjm", "benjman", 
                                                                 "benjmin", "benjmine", "benjmon", "benjn", "benjr", "benn", "benney", 
                                                                 "bennie", "benno", "benny", "beny", "benett", "bennet", "bent", 
                                                                 "bently", "barnard", "benard", "bernardo", "bernerd", "bernie", 
                                                                 "berny", "burnard", "burnie", "barnhard", "barnhardt", "barnhart", 
                                                                 "benhard", "benhart", "bernhardt", "bernhart", "bery", "berta", 
                                                                 "bertie", "bertis", "berttie", "birt", "birtie", "birty", "burt", 
                                                                 "burtie", "bertran", "bertrum", "bevely", "beverley", "bismark", 
                                                                 "boliver", "boon", "brad", "briant", "berton", "burten", "biron", 
                                                                 "byram", "ceasar", "ceaser", "ceasor", "cesar", "cesario", "cezar", 
                                                                 "stcair", "calab", "calib", "calob", "calup", "cal", "call", 
                                                                 "callie", "cally", "calvan", "calven", "colvin", "cam", "camile", 
                                                                 "stcare", "carrie", "carry", "cary", "carel", "carol", "caroll", 
                                                                 "carrol", "caspar", "kasper", "cas", "cashus", "casius", "cass", 
                                                                 "cassus", "kay", "seeley", "seely", "cephus", "chanfan", "carl", 
                                                                 "carle", "carles", "carley", "carlie", "carlos", "carly", "ch", 
                                                                 "cha", "chales", "chalie", "chals", "char", "charels", "chares", 
                                                                 "charl", "charle", "charless", "charley", "charlie", "charlis", 
                                                                 "charls", "charly", "chars", "chas", "chls", "chrles", "chs", 
                                                                 "chuck", "karl", "chance", "chancey", "chancy", "channcy", "chauncy", 
                                                                 "ches", "chess", "chinlen", "stchong", "christan", "christina", 
                                                                 "christion", "cristian", "christain", "christean", "christen", 
                                                                 "christn", "christon", "chistopher", "chris", "chriss", "christ", 
                                                                 "christie", "christifer", "christin", "christof", "christofer", 
                                                                 "christoff", "christoffer", "christoper", "christoph", "christophe", 
                                                                 "christpher", "christy", "cris", "criss", "crist", "cristopher", 
                                                                 "kit", "kitt", "cisero", "stclai", "clabe", "claborn", "claborne", 
                                                                 "claiborn", "clayborn", "clayborne", "clayburn", "stclain", "stclaior", 
                                                                 "saintclair", "stclair", "clare", "saintclare", "stclaire", "stclare", 
                                                                 "stclara", "claranc", "clarance", "clarenc", "clarince", "clarnce", 
                                                                 "clarrance", "clarrence", "stclari", "claud", "clauda", "claudie", 
                                                                 "claudus", "claudy", "stclaud", "claton", "stclear", "clem", 
                                                                 "clemant", "clemence", "clemente", "clements", "clemment", "clemont", 
                                                                 "cliff", "cliford", "clint", "clinten", "stcloud", "clide", "cloyd", 
                                                                 "colman", "stcolombe", "collumbus", "colombus", "commadore", 
                                                                 "comodore", "con", "conard", "conrod", "coonrad", "coonrod", 
                                                                 "konrad", "constant", "corry", "cory", "carnelius", "conelius", 
                                                                 "cornealus", "corneilius", "corneilus", "cornelas", "corneleus", 
                                                                 "cornelias", "cornelious", "cornelis", "cornelous", "corneluis", 
                                                                 "cornelus", "cornielus", "cornilius", "crofford", "stcroix", 
                                                                 "stcrowling", "cudjr", "curt", "curtice", "curtiss", "curtus", 
                                                                 "saintcyr", "stcyr", "cyrille", "cirus", "cyras", "siras", "syrus", 
                                                                 "dallis", "daiel", "dan", "danel", "danial", "danie", "daniell", 
                                                                 "danil", "danl", "dann", "dannel", "dannie", "danniel", "dannil", 
                                                                 "danny", "danuel", "jf", "darias", "derias", "derius", "dav", 
                                                                 "dave", "daved", "davey", "davidh", "davie", "davied", "davies", 
                                                                 "davy", "decater", "decator", "demps", "stdenise", "denis", "dennes", 
                                                                 "dennie", "denny", "dinnis", "stdenis", "derick", "stdevon", 
                                                                 "dewit", "dederick", "dedrick", "deidrich", "detrick", "diedrich", 
                                                                 "diedrick", "dom", "domenick", "dominick", "domnick", "don", 
                                                                 "donnie", "dora", "douglass", "dug", "duglas", "duglass", "drue", 
                                                                 "drewry", "dudly", "durac", "dewight", "earle", "erl", "erle", 
                                                                 "earnst", "ebeneezer", "ebenezar", "ebinezer", "edgard", "edger", 
                                                                 "egar", "edman", "edmand", "edmon", "edmond", "edmun", "edney", 
                                                                 "ed", "edd", "edde", "eddey", "eddie", "eddward", "eddy", "edie", 
                                                                 "edouard", "eduard", "eduward", "edvard", "edw", "edwad", "edwar", 
                                                                 "edwardo", "edwards", "edwart", "edwd", "edwerd", "edword", "edwrd", 
                                                                 "edy", "esqedie", "eward", "ewd", "ned", "neddie", "edwan", "steger", 
                                                                 "eleazer", "ely", "ellias", "elihue", "elia", "eliah", "eliga", 
                                                                 "eligah", "eligha", "eligia", "eliha", "elija", "lige", "eliphalet", 
                                                                 "eliza", "elizah", "elza", "elzie", "elzy", "elkana", "eliot", 
                                                                 "eliott", "elliott", "elis", "almer", "ellmer", "elmar", "elmor", 
                                                                 "stelmor", "elma", "saint", "stelma", "stelmo", "stelmon", "saintelmore", 
                                                                 "stelmore", "stelms", "alwin", "emmerson", "amory", "em", "emory", 
                                                                 "emry", "ameil", "amiel", "amil", "amile", "emel", "emiel", "emile", 
                                                                 "emille", "emmil", "amanuel", "emanel", "emaniel", "emanual", 
                                                                 "emanuel", "emanul", "immanuel", "mannie", "manny", "manuel", 
                                                                 "emet", "emett", "emit", "emitt", "emmett", "emmit", "emmitt", 
                                                                 "enick", "enoc", "enock", "ephram", "ephrem", "ephriam", "ephrim", 
                                                                 "ephrum", "epraim", "rasmus", "erich", "erick", "erik", "errick", 
                                                                 "earnest", "earnist", "ernast", "erneste", "ernie", "ernist", 
                                                                 "ernst", "erskin", "erven", "esaw", "eathan", "ethen", "eug", 
                                                                 "eugean", "eugen", "eugenia", "eugenie", "eugenio", "eugine", 
                                                                 "eugne", "euguene", "eugune", "eujene", "gene", "genie", "jene", 
                                                                 "ugene", "enis", "eusebe", "eusebio", "estus", "evans", "even", 
                                                                 "evin", "everet", "everitt", "evertt", "evrett", "ezekel", "ezekial", 
                                                                 "ezkiel", "zeke", "esra", "ezera", "faustin", "felex", "felis", 
                                                                 "feliz", "phelix", "ferd", "ferdanand", "ferdenand", "ferdinad", 
                                                                 "ferdinan", "ferdinant", "ferdnand", "fernand", "fernando", "fredinand", 
                                                                 "stfeugos", "philmore", "ferman", "fermin", "firman", "flavious", 
                                                                 "flecher", "florance", "floid", "floyed", "forest", "fount", 
                                                                 "fancis", "fank", "fracis", "frak", "franc", "france", "frances", 
                                                                 "francies", "francis", "franck", "frankdr", "franke", "frankey", 
                                                                 "frankie", "franky", "frans", "fransis", "frantz", "franz", "stfrancis", 
                                                                 "fraklin", "frankin", "franklen", "frankline", "frankling", "franklyn", 
                                                                 "franlin", "fed", "federick", "federico", "fedric", "fedrick", 
                                                                 "frd", "fread", "fred", "fredc", "fredd", "freddie", "freddy", 
                                                                 "frede", "frederck", "fredereck", "frederic", "frederich", "frederik", 
                                                                 "fredick", "fredie", "fredirick", "fredk", "fredr", "fredreck", 
                                                                 "fredric", "fredrich", "fredrick", "fredrik", "fredy", "frid", 
                                                                 "friderich", "friderick", "fridrich", "fridrick", "friederich", 
                                                                 "friederick", "friedr", "friedrich", "friedrick", "freman", "freemont", 
                                                                 "gabe", "gabrel", "gabrial", "gabril", "garet", "garret", "garrit", 
                                                                 "gerrit", "garry", "stgeoege", "geo", "geoge", "geor", "geore", 
                                                                 "georg", "georga", "georges", "georgia", "georgie", "gerge", 
                                                                 "geroge", "goerge", "gorge", "jeorge", "stgeorg", "stgeorge", 
                                                                 "stgeorges", "gerry", "jary", "jerald", "jerrie", "jery", "gid", 
                                                                 "giddeon", "gidion", "gelbert", "gil", "jiles", "glen", "godfred", 
                                                                 "godfried", "godfry", "gotfried", "gottfred", "gordan", "gorden", 
                                                                 "grdon", "godlieb", "gotleb", "gotleib", "gotlib", "gotlieb", 
                                                                 "gottleib", "gottlib", "gottlob", "graftons", "grantu", "gran", 
                                                                 "grandville", "granvil", "granvill", "grey", "greenbery", "greg", 
                                                                 "gregg", "gregorio", "griff", "griffeth", "gustaf", "gustaff", 
                                                                 "gustav", "gustof", "gustoff", "gustov", "gustavas", "gustaves", 
                                                                 "gustavis", "gustavius", "hame", "hamelton", "hamp", "hamton", 
                                                                 "hanibal", "hardin", "harland", "harlin", "harlon", "harlie", 
                                                                 "harly", "harald", "harrold", "herald", "haris", "harison", "harrisson", 
                                                                 "harva", "harve", "harvie", "harvy", "hervey", "heinrick", "henrich", 
                                                                 "henrick", "helmuth", "hendrick", "hal", "hank", "hanry", "harey", 
                                                                 "harrey", "harrie", "harry", "hary", "hen", "henery", "heney", 
                                                                 "hennry", "henny", "henrey", "henreyb", "henri", "henrie", "henryr", 
                                                                 "heny", "herny", "herry", "hery", "harbert", "hebert", "herbet", 
                                                                 "herbie", "herburt", "herby", "hurbert", "hurburt", "herm", "hermann", 
                                                                 "hermen", "hermin", "hermon", "herrman", "herrmann", "hurman", 
                                                                 "hershal", "hershel", "hesakiah", "hesekiah", "hesikiah", "hez", 
                                                                 "hezakiah", "hezikiah", "hezkiah", "hilary", "hilery", "hillery", 
                                                                 "hillory", "hilry", "hypolite", "hi", "hirem", "hiriam", "hirom", 
                                                                 "hirum", "hy", "hyram", "hyrum", "harace", "horas", "horice", 
                                                                 "horis", "horrace", "horrice", "horris", "horatia", "hosa", "hosey", 
                                                                 "hosia", "hosie", "haward", "how", "howe", "hutson", "hew", "hough", 
                                                                 "hue", "huey", "hughey", "hughy", "humphry", "umphrey", "stiago", 
                                                                 "ignace", "ignatious", "ignatus", "ignatz", "irah", "ire", "erving", 
                                                                 "iaac", "ike", "isaace", "isaacjr", "isaack", "isaak", "isac", 
                                                                 "isacc", "isach", "isack", "isaic", "isak", "isiac", "isic", 
                                                                 "isick", "issaac", "issac", "isador", "isidor", "isidro", "isa", 
                                                                 "isaah", "isiah", "isom", "ison", "isum", "ishmeal", "isarel", 
                                                                 "iseral", "isral", "isreal", "isrel", "isrial", "isriel", "ivin", 
                                                                 "ivey", "jabes", "jabus", "jacb", "jackob", "jacobe", "jacobo", 
                                                                 "jacop", "jacub", "jake", "jakob", "jocob", "jaques", "stjago", 
                                                                 "gim", "ja", "jam", "jame", "jamesj", "jamie", "jamis", "jams", 
                                                                 "jamy", "janes", "jas", "jeames", "jeams", "jemes", "jim", "jimey", 
                                                                 "jimie", "jimmey", "jimmie", "jimmy", "jimy", "jm", "stjames", 
                                                                 "jennie", "japhet", "jarred", "jarret", "jasen", "jaspar", "stjean", 
                                                                 "jed", "jediah", "jedediah", "jeferson", "jef", "jeff", "jeffery", 
                                                                 "jeffie", "jeffry", "jehial", "jemmie", "jeptha", "jeramiah", 
                                                                 "jeremia", "jerimah", "jerimiah", "jermiah", "jerre", "jerremiah", 
                                                                 "jerrimiah", "jerrymiah", "gerome", "jarome", "jerom", "jes", 
                                                                 "jese", "jesee", "jesey", "jesie", "jess", "jessa", "jessee", 
                                                                 "jessey", "jessi", "jessie", "jessy", "jesuss", "saintjex", "joachin", 
                                                                 "joaquin", "jobe", "jodie", "joal", "joell", "johan", "johon", 
                                                                 "johanas", "johanes", "johannas", "captjohn", "jac", "jack", 
                                                                 "jahn", "jehn", "jhn", "jhon", "jn", "jno", "jnojr", "jock", 
                                                                 "johm", "johnc", "johne", "johney", "johnie", "johnjr", "johnn", 
                                                                 "johnnd", "johnney", "johnnie", "johnny", "johnrd", "johns", 
                                                                 "johnsr", "johny", "jon", "jonn", "jonnie", "jonny", "saintjohn", 
                                                                 "stjohn", "jona", "jonas", "jonassr", "johathan", "johnathan", 
                                                                 "johnathen", "johnathon", "johnithan", "johnothan", "jonathen", 
                                                                 "jonathon", "jonethan", "jonithan", "jonothan", "jerdon", "jorden", 
                                                                 "jordon", "jourdan", "jourden", "josejesus", "josew", "jaseph", 
                                                                 "jo", "joe", "joeph", "joeseph", "joesph", "jos", "josaph", "josef", 
                                                                 "josep", "josepf", "josephe", "josephfathr", "josephine", "josey", 
                                                                 "josheph", "josie", "josiph", "josoph", "jospeh", "josph", "jrs", 
                                                                 "saintjoseph", "stjoseph", "jashua", "josh", "joshaway", "joshuay", 
                                                                 "josua", "josuah", "josias", "jul", "jule", "jules", "julia", 
                                                                 "julien", "julies", "july", "stjulian", "stjulien", "juleus", 
                                                                 "julias", "julio", "julious", "julis", "juluis", "julus", "stjulius", 
                                                                 "junious", "stjuste", "gustin", "jus", "keneth", "kenny", "kerby", 
                                                                 "claus", "clause", "klaas", "knud", "knudt", "knute", "nute", 
                                                                 "laben", "labon", "lacey", "fayett", "fayette", "lafaett", "lafaette", 
                                                                 "lafayet", "lafayett", "lafe", "lafeyette", "lafyett", "lafyette", 
                                                                 "layfaett", "layfaette", "layfayett", "layfayette", "layfette", 
                                                                 "landen", "lang", "lora", "lavern", "larance", "larence", "larrence", 
                                                                 "larry", "lary", "laurance", "laurence", "laurens", "law", "lawerence", 
                                                                 "lorance", "lorence", "lauson", "lea", "leeander", "stledger", 
                                                                 "leelui", "lamuel", "lem", "lemiel", "lemual", "lemul", "leona", 
                                                                 "leone", "leonrev", "stleon", "leanard", "leanord", "len", "lenard", 
                                                                 "lenn", "lennard", "lennie", "lenny", "lenoard", "lenord", "leny", 
                                                                 "leo", "leonhardt", "leonadas", "leonadus", "leonides", "leonidus", 
                                                                 "leapold", "lepold", "laroy", "leeroy", "lesley", "lesly", "lesslie", 
                                                                 "leungchin", "saintlewalte", "ii", "leuis", "lew", "lewes", "lewey", 
                                                                 "lewie", "lewy", "lois", "loo", "lou", "loue", "louey", "loui", 
                                                                 "louie", "louis", "louisc", "louise", "louismw", "louiss", "lous", 
                                                                 "lowis", "lu", "lue", "luey", "luie", "luis", "saintlouis", "stlouis", 
                                                                 "stlue", "stlezer", "lincon", "lindsy", "linsey", "linsy", "linzy", 
                                                                 "linas", "livi", "lloid", "loid", "loyd", "loyed", "lewellen", 
                                                                 "lewellyn", "lewuellen", "lewuellin", "lewyallen", "lewyelen", 
                                                                 "lewyelin", "lewyellan", "lewyellen", "lewylin", "lewyllan", 
                                                                 "lewyllen", "lewyllin", "lewyllyn", "lewylyn", "lhewlyn", "llewellyn", 
                                                                 "llewelyn", "luellen", "stloggen", "laurin", "loran", "lorin", 
                                                                 "loranza", "loranzo", "lorenso", "lorentz", "lorenz", "lorenza", 
                                                                 "lorenze", "lorain", "lott", "stlovell", "lucus", "lucien", "lucion", 
                                                                 "lucious", "lucuis", "lucy", "lud", "stluke", "luthur", "limon", 
                                                                 "lindon", "maddison", "malichi", "malcom", "malcomb", "malcum", 
                                                                 "manassa", "manoel", "manual", "manul", "minus", "marcellas", 
                                                                 "marcelus", "marsellus", "marc", "marcos", "marke", "markus", 
                                                                 "stmarcus", "marian", "marien", "marrion", "stmark", "marlin", 
                                                                 "marques", "marshal", "marshel", "marshell", "marcial", "mart", 
                                                                 "martain", "marten", "marthin", "martie", "marton", "marty", 
                                                                 "martyn", "stmartin", "marven", "stmary", "mathais", "matheas", 
                                                                 "mathes", "mathies", "mathis", "mathius", "matias", "matthias", 
                                                                 "mattias", "methias", "stmathue", "mattie", "mat", "math", "mathew", 
                                                                 "mathews", "mathiew", "matt", "matthews", "mayhew", "stmathew", 
                                                                 "stmatthew", "maury", "morice", "morrice", "stmaurice", "max", 
                                                                 "maxey", "maxie", "maxime", "maximillian", "maximo", "maxmillian", 
                                                                 "mead", "melchor", "melvil", "melvill", "malvin", "mel", "melven", 
                                                                 "melvine", "merideth", "meridith", "merleb", "mervin", "micajah", 
                                                                 "machael", "mic", "micael", "mich", "micha", "michaiel", "michail", 
                                                                 "michal", "michale", "michall", "micheal", "michel", "michell", 
                                                                 "michial", "michiel", "michl", "michle", "michul", "mick", "mickael", 
                                                                 "mickel", "micle", "mik", "mikael", "mike", "mikel", "mikle", 
                                                                 "milard", "millerd", "milliard", "melton", "milt", "milten", 
                                                                 "miner", "mitch", "mitchael", "mitchel", "monro", "monrow", "munro", 
                                                                 "munroe", "munrow", "mont", "mordica", "moris", "morriss", "morison", 
                                                                 "mort", "mortimor", "mortimore", "mortin", "mases", "mose", "mosses", 
                                                                 "murdock", "murry", "miron", "myran", "naham", "napolean", "napolian", 
                                                                 "napolion", "nepoleon", "nepolian", "narcisse", "nathen", "nathon", 
                                                                 "nat", "nate", "nath", "nathanael", "nathanal", "nathanel", "nathanial", 
                                                                 "nathanil", "nathanl", "nathanuel", "nathl", "natt", "nattie", 
                                                                 "nemiah", "neal", "neel", "neill", "niel", "neils", "nelse", 
                                                                 "niels", "neuton", "newt", "newten", "nuton", "nic", "nich", 
                                                                 "nichlas", "nichlos", "nichol", "nicholaus", "nicholes", "nicholis", 
                                                                 "nicholos", "nichols", "nicholus", "nick", "nicklas", "nicklaus", 
                                                                 "nicklos", "nickolas", "nickolaus", "niclaus", "nicolas", "nicolaus", 
                                                                 "nicolus", "niles", "noa", "noe", "noland", "normon", "nuttn", 
                                                                 "obe", "obediah", "obid", "obidiah", "obie", "octave", "octavus", 
                                                                 "olef", "olif", "olof", "oloff", "oluf", "oldsam", "olaver", 
                                                                 "olever", "olie", "olivar", "olive", "olivier", "olley", "ollie", 
                                                                 "olliver", "olly", "olover", "oly", "orestus", "olando", "orland", 
                                                                 "orlanda", "orlander", "orin", "oron", "orren", "orison", "orrison", 
                                                                 "orval", "orvel", "orvil", "orvill", "ausker", "ocar", "osca", 
                                                                 "oscer", "oschar", "oscor", "oscur", "osgar", "oska", "oskar", 
                                                                 "osker", "otes", "ottis", "otus", "otho", "oto", "ott", "otta", 
                                                                 "ottie", "ottoe", "ovide", "owin", "parris", "park", "paschal", 
                                                                 "pasqual", "pat", "paterick", "patk", "patr", "patric", "patrich", 
                                                                 "patrik", "patrk", "pats", "patsey", "patsy", "patt", "pattrick", 
                                                                 "stpatrick", "pall", "saintpaul", "stpaul", "paulin", "pearley", 
                                                                 "pearly", "perl", "purley", "percey", "percie", "persey", "persy", 
                                                                 "stpere", "stperee", "perrey", "perrie", "pery", "pater", "peater", 
                                                                 "peder", "peeter", "pete", "petre", "petter", "pier", "pieter", 
                                                                 "stpeeter", "stpeter", "payton", "filander", "fill", "phil", 
                                                                 "philep", "philiph", "philipp", "philips", "phill", "phillip", 
                                                                 "phillipp", "phillop", "philop", "philup", "finus", "phineus", 
                                                                 "phinias", "stpierre", "pietjr", "pinkny", "pleas", "pleasent", 
                                                                 "ples", "plesant", "pliney", "peter", "pomp", "pompy", "prentiss", 
                                                                 "presly", "press", "pressley", "pressly", "stproville", "stpubian", 
                                                                 "quinton", "quin", "quince", "rollie", "ralf", "randal", "randle", 
                                                                 "randol", "randolf", "rafael", "rafe", "rafel", "raphel", "ramon", 
                                                                 "ramond", "ray", "raymon", "rees", "reid", "reuban", "reubin", 
                                                                 "rheuben", "rheubin", "rhuben", "ruban", "rube", "ruben", "rubin", 
                                                                 "rueben", "ruebin", "ruel", "rex", "dick", "dickey", "ricard", 
                                                                 "ricd", "rich", "richart", "richd", "richerd", "richie", "rick", 
                                                                 "ritchard", "reily", "rily", "ryley", "bob", "bobbie", "bobby", 
                                                                 "rbert", "rbt", "rob", "robart", "robb", "robbert", "robbie", 
                                                                 "rober", "roberts", "robertx", "robet", "robie", "robrt", "robt", 
                                                                 "roby", "roderic", "rodrick", "rodger", "rogers", "rolan", "rolen", 
                                                                 "rolla", "rolland", "rollen", "rolley", "rolly", "rowland", "romulo", 
                                                                 "ron", "rosco", "roymw", "ry", "saintroy", "rya", "rodolph", 
                                                                 "rodolphus", "rud", "rudolf", "rudolp", "rudy", "rufas", "ruff", 
                                                                 "ruffus", "ruphus", "rubert", "rus", "rusel", "rusell", "russ", 
                                                                 "russel", "russle", "stsalvador", "sam", "samd", "same", "samel", 
                                                                 "sameul", "samey", "samie", "samiel", "samil", "saml", "sammie", 
                                                                 "sammuel", "sammy", "samual", "samuell", "samuil", "samul", "samule", 
                                                                 "samy", "sanuel", "simuel", "sml", "sandford", "sandy", "santford", 
                                                                 "sauel", "scot", "seabron", "seborn", "seburn", "bastian", "sabastian", 
                                                                 "sebastin", "sebastion", "semore", "semour", "seymor", "seymore", 
                                                                 "shack", "shad", "shade", "shadrack", "shadric", "shadrick", 
                                                                 "shed", "shedric", "shedrick", "stshepherd", "sheriden", "sydna", 
                                                                 "si", "siles", "silus", "sylus", "sylvanis", "sylvanus", "sylvenus", 
                                                                 "simion", "sim", "siman", "simen", "simons", "symon", "simson", 
                                                                 "salmon", "saloman", "salomon", "solaman", "solamon", "soleman", 
                                                                 "solemon", "soliman", "solimon", "sollomon", "solmon", "solom", 
                                                                 "soloman", "solomen", "solan", "solen", "stanislas", "stan", 
                                                                 "stanly", "sephen", "steaphen", "steaven", "stepen", "steph", 
                                                                 "stephan", "stephens", "stephin", "stephn", "stevan", "steve", 
                                                                 "steven", "stevens", "ststephen", "stirling", "steward", "stuard", 
                                                                 "stuart", "sulivan", "sue", "swen", "cidney", "sid", "sidny", 
                                                                 "sydny", "selvester", "silvester", "sylvesta", "sylvestor", "tailor", 
                                                                 "tayler", "terrance", "terrence", "terry", "terance", "thad", 
                                                                 "thaddius", "thadeous", "thadeus", "thadious", "thadius", "thadus", 
                                                                 "theobold", "ted", "teddy", "teodore", "teodoro", "the", "theador", 
                                                                 "theadore", "thedore", "theo", "theod", "theodor", "theodora", 
                                                                 "theordore", "thodore", "theophelus", "theophile", "theopholis", 
                                                                 "theopholus", "theopilus", "theopolis", "tracey", "th", "thmas", 
                                                                 "tho", "thom", "thoma", "thomes", "thomis", "thommas", "thomos", 
                                                                 "thoms", "thonas", "thos", "ths", "tom", "tomas", "tomey", "tomie", 
                                                                 "tommas", "tommie", "tommy", "tomy", "tompson", "thorton", "tilghman", 
                                                                 "tilman", "tilmon", "thimothy", "thimoty", "tim", "timathy", 
                                                                 "timithy", "timothey", "tobe", "tobie", "toby", "ulrick", "ulises", 
                                                                 "ulisis", "ulisses", "ulissis", "ulissus", "ulisus", "ulyses", 
                                                                 "ulysess", "ulysis", "ulysse", "ulyssis", "ulyssus", "ulysus", 
                                                                 "urial", "urias", "val", "valantine", "valentin", "valintine", 
                                                                 "volentine", "vern", "stvictor", "vick", "victorin", "stviles", 
                                                                 "stville", "stvincent", "vicente", "vince", "vincen", "vincenz", 
                                                                 "vergil", "virgal", "virgel", "virgie", "stvrain", "waddy", "waid", 
                                                                 "walace", "walice", "wallas", "walles", "wallice", "wallis", 
                                                                 "walley", "wallie", "wally", "walt", "waltar", "walterrev", "walters", 
                                                                 "walther", "waltor", "waren", "warran", "warrin", "worren", "wash", 
                                                                 "washing", "washs", "wane", "web", "webb", "welcom", "weldonm", 
                                                                 "wellingtons", "wencil", "wes", "wesleyjr", "weslie", "wesly", 
                                                                 "wess", "wessley", "wessly", "westley", "westly", "wisley", "wilber", 
                                                                 "wilbor", "wilburn", "wilburt", "willber", "wyley", "wyly", "wilham", 
                                                                 "willhelm", "wilard", "williard", "bill", "billey", "billie", 
                                                                 "billy", "md", "wil", "wilh", "wiliam", "wilie", "will", "willa", 
                                                                 "willaim", "willam", "wille", "willem", "willey", "willi", "willia", 
                                                                 "williams", "willian", "willie", "willilam", "willim", "willium", 
                                                                 "willliam", "willm", "willy", "wilm", "wily", "wlm", "wm", "wilis", 
                                                                 "willes", "willice", "willmer", "willson", "windfield", "winfred", 
                                                                 "winnie", "wooheng", "woodie", "woody", "wiatt", "wyat", "wyett", 
                                                                 "havier", "xaver", "yechung", "zac", "zacariah", "zach", "zacharia", 
                                                                 "zachariah", "zacharias", "zacheriah", "zachriah", "zack", "zackariah", 
                                                                 "zadoc", "zadock", "zebedee", "zed", "zenas", "zenos", "zeph", 
                                                                 "zepheniah")), row.names = c(NA, -2268L), class = c("data.table", 
                                                                                                                     "data.frame"))
  #Titles
  titles =  c("jr",  "sr",  "junior",  "senior",  "mr",  "mrs",  "ms",  "miss", 
              "madame",  "monsieur",  "mademoiselle",  "mme",  "mdm",  "mlle",  
              "mle",  "senior",  "senorita",  "",  "senora",  "srta",  "sra",  
              "aunt",  "auntie",  "maid",  "master",  "uncle",  "cousin", 
              "ma",  "mother",  "father",  "sister",  "brother",  "fr",  
              "br",  "bro",  "sis",  "minister",  "elder",  "mra",  
              "constable",  "agent",  "bishop",  "abbess",  "abbot",  
              "superior",  "rev",  "reverend",  "friar",  "dr",  "doctor",  
              "professor",  "prof", "general",  "gen",  "genl",  "gemeral",
              "brigadier",  "brig",  "major",  "maj",  "commandant",  "colonel", 
              "col",  "captain",  "cap",  "capt",  "cpt",  "first",  "second", 
              "lieutenant",  "lieut",  "lt",  "master",  "staff",  "gunnery", 
              "seargent",  "sarge",  "sgt",  "corporal",  "cpl",  "lance", 
              "lcpl",  "cadet",  "cdt",  "private",  "class",  "pfc",  "pvt",
              "admiral",  "adm",  "commander",  "cdr",  "ensign",  "ens",  
              "warrant",  "petty",  "officer",  "seaman",  "sea",  "sn",  
              "fst",  "snd",  "sec",  "honrable",  "hon",  "senator",  "sen", 
              "representative",  "rep",  "gov",  "governor",  "dean",  "provost", 
              "ambassador",  "delegate",  "mayor",  "speaker",  "councilor",  
              "governor",  "selectman",  "alderman",  "chief",  "marshal",  
              "sheriff",  "warden",  "alderman",  "esquire",  "mister")
  
  #Clean first/middle/last
  first = first %>% 
          stri_unescape_unicode %>% 
          str_to_lower() %>% 
          str_replace("\\.", " ") %>%
          str_replace_all("[^a-z ]", "") %>%
          str_squish() 
  if (!is.null(middle)) {
    middle[middle == ""] = NA
    middle = middle %>% 
             stri_unescape_unicode %>% 
             str_to_lower() %>% 
             str_replace("\\.", " ") %>%
             str_replace_all("[^a-z ]", "") %>%
             str_squish()}
  last = last %>% 
         stri_unescape_unicode %>% 
         str_to_lower() %>% 
         str_replace_all("\\.", " ") %>%
         str_replace_all("[^a-z ]", "") %>%
         str_squish() 
  #Remove titles
  if (do_titles == T) {
    for (t in titles) {
      first = first %>% str_replace(paste0('^',t,' '), '')
    }
  }
  #Fix two-word names
  first = first %>% str_replace("(?=(^| ))st ", "st")
  first = first %>% str_replace("(?=(^| ))ste ", "ste")
  first = first %>% str_replace("(?=(^| ))saint ", "saint")
  first = first %>% str_replace("(?=(^| ))virg ", "virg")
  first = first %>% str_replace("(?=(^| ))mac ", "mac")
  first = first %>% str_replace("(?=(^| ))mc ", "mc")
  #last
  last = last %>% str_replace("(?=(^| ))st ", "st")
  last = last %>% str_replace("(?=(^| ))ste ", "ste")
  last = last %>% str_replace("(?=(^| ))saint ", "saint")
  last = last %>% str_replace("(?=(^| ))virg ", "virg")
  last = last %>% str_replace("(?=(^| ))mac ", "mac")
  last = last %>% str_replace("(?=(^| ))mc ", "mc")
  #Extract middle names
  if (is.null(middle)){
    middle = first %>% str_extract("(?<=[a-z]\\s)[a-z ]+$")
    first = first %>% str_extract("(?<=^)[a-z]+(?=( |$))")
  }
  #Merge in nicknames
  setkey(nicknames, nickname)
  first_clean = nicknames[, name][match(x = first, table = nicknames[, nickname])]
  first_clean[is.na(first_clean)] = first[is.na(first_clean)]
  return(data.table(first, middle, last, first_clean))
}